home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / WIN / VB_DB / VBDB.ZIP / VBDB.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1991-07-05  |  7.8 KB  |  260 lines
  1. MainMenu
  2. System
  3. wwwwwwwwwwwwwwp
  4. wwwwwwwwwwwwwwp
  5. Form1,
  6. MainFile
  7. &File
  8. OpenDBF
  9. &Open Database
  10. CloseDBF
  11. &Close Database
  12.     CreateDBF
  13. C&reate Database
  14. &Define fields
  15. &Create database file
  16. ExitVBDB
  17. &Exit VBDB
  18. &Records
  19. GetREC
  20. &Browse records
  21. EdRec
  22. &Edit records
  23.     Structure
  24. &Structure
  25.     DispStruc
  26. &Auto summary
  27. DispHead
  28. Display &summary
  29. Utils
  30. &Utilities
  31. &Pack database
  32. ZAPDB
  33. &ZAP database
  34.     SearchDBF
  35. &Search database
  36.     SearchFLD
  37. search &field
  38.     SearchREC
  39. search &record
  40.     Stamp_Rec
  41. &Change record counter
  42. &Help
  43. about
  44. &About VBDB
  45. PutRecH
  46. File|
  47. Record
  48. GetRec
  49.     DeleteRECs
  50. OpenDBF_Click
  51. form1;
  52. form2Q
  53. sleepV
  54. delay
  55. FileMGRc
  56. ExitVBDB_ClickT
  57. FileForm    
  58. Caption
  59.     FIL_Files]
  60. MODAL/
  61. DialogContinue
  62. WhatView
  63.     VIEW_CARD
  64. ShowHide
  65. FALSEs
  66. NeedToSaveF
  67. TempFileNameY
  68. TXT_TextBox
  69. OpenFile
  70. DF_Click@
  71. CloseDBF_Click
  72. CreateDBF_Click&
  73. Index
  74. SearchFF_Click
  75. CalcForm
  76. CalcFrmg
  77.     CDF_Click
  78. Calculator>
  79. MainFile_Click]
  80. Load1
  81. DBFName
  82. MainMenu
  83. Active
  84. FileSpec
  85. model
  86. Startz
  87.     StartName
  88. EndName
  89. OpenDataBase'
  90. GetREC_Click
  91. OpenDatabaseComM
  92. Enabled
  93. DatabaseCom
  94. HelpName
  95. HelpCom
  96. OpenDBFComC
  97. OpenDBFM
  98. CloseDBF
  99.     CreateDBF>
  100. Recsk
  101. CloseDataBase
  102. Status
  103. VBDB8
  104. EdRec_Clickr
  105. Form_Click
  106. Form_LinkClose
  107. Form_LinkError
  108. LinkErr
  109. Form_LinkExecute
  110. CmdStrd
  111. Cancel`
  112. Form_LinkOpenx
  113. @    Form_Load
  114. Form_LostFocus
  115. WindowState1
  116. logo 
  117. Marquis
  118. Form_MouseMove[
  119. Button
  120. Shift
  121. Form_MouseDown
  122.     BackColorT
  123. BlueU
  124. green
  125. MousePointer
  126. about_Click
  127. DispStruc_ClickF
  128. DisplayStructure
  129. DispHead_Clicku
  130. DisplayHeader
  131.     DBFHandle
  132. SetMaxError%
  133. MaxErrorMsg
  134. ErrorAction
  135.     Structure
  136. Utils,
  137. RightNow
  138. LoadDisplay?
  139.     HOURGLASS
  140. Default
  141.     sep_Click
  142. SelRec
  143. SelectRecordP
  144. KeepInfo
  145. DispDBInfo
  146. Screent
  147. ActiveFormo
  148. Form_DblClick
  149. FormName8
  150. LargeChangeZ
  151. SmallChange
  152. Option1
  153. Value
  154. Option2
  155. Option3
  156. GetNumRecs
  157. RecordCount
  158. MaxError
  159. ErrNo
  160. ProgNameb
  161. Stamp_Rec_Click
  162. InputBoxDemo
  163. Title
  164. NewDate
  165. SaveREC_Click.
  166. SearchDBF_ClickA
  167. SearchFLD_ClickT
  168. SearchREC_Click
  169. sep2_Click
  170. Structure_Click
  171. NewCount
  172. StampRec
  173. Records
  174. CurCount
  175. Count
  176. StampRecord
  177. DefineDatabase
  178. ZAPDB_Click
  179. DATABASE
  180. Pack_Click
  181. Help_Clickg
  182. RecSizeD
  183. Display_Rec_Fld
  184. HSCroll1
  185. MAXIMIZE
  186. MCLogo
  187.     VBDB_Logo
  188.     DispStruc
  189. Checked*
  190. OpenDBF_Click
  191. --- use FileForm to get DBF name
  192. File Open"
  193. modal
  194. --- if DBF is loaded
  195. read DBF namea
  196. --> to upper
  197. --- process name
  198. *.DBF"
  199. --- change window captiona
  200. --- open the databaset
  201. --- load display form with this DBF data
  202. --- set Menu option to proper state-
  203. --- set to invalid dbf
  204. --- if auto-display is enabled, then
  205.  display header data
  206. ExitVBDB_Click
  207. end the program
  208. Msg$ = "Save changes to " + DBFNameB
  209. Save = MsgBox(Msg$, 4, "Save File")t
  210. CloseDBF_Click
  211. Closes an open databasea
  212. Form_Load
  213. Load MainMenu into maximized window    
  214. --- name this programo
  215. --- mouse to hour glass
  216. --- maximize & show main menu
  217. --- show my logo
  218. --- process menu
  219. about_Click
  220. DispHead_Click
  221. displays a field database structuree
  222. GetREC_Click
  223. uses a form to input the record number
  224. --- get the record count
  225. --- if no records then error out
  226. --- set up scroll 
  227. --- setup view optiond
  228. --- set up scroll bar min count
  229. --- do the record window
  230. Stamp_Rec_Click
  231. Prompts for and then changes a database record
  232. counter.
  233. Enter a new record count value
  234. set up message
  235. Change record count"
  236. set titlel
  237. Use current countr
  238. Get user input
  239. convert to long int
  240. Check if valid
  241. Confirm record count change"
  242. Display message 
  243. DF_Click
  244. ZAPDB_Click
  245. ZAPs a database - UNREM to use
  246. WARNING PHYSICALLY REMOVES ALL RECORDS FROM 
  247. A DATABASE!S
  248. Close DBFHandle
  249. ZAP DBFName$
  250. OpenDataBase DBFName$, DBFHandle
  251. Pack_Click
  252. Packs a database - UNREM to usee
  253. WARNING PHYSICALLY REMOVES ALL RECORDS WHICH
  254. ARE MARKED FOR DELETION FROM A DATABASE!
  255. Close DBFHandleL
  256. PackDBF DBFName$
  257. OpenDataBase DBFName$, DBFHandle
  258. DispStruc_Click
  259. toggles
  260.